home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 016 / fansicon.arc / DOSEDIT2.PCH < prev    next >
Encoding:
Text File  |  1984-12-13  |  2.8 KB  |  263 lines
  1. ;The following command should be applied to DOSEDIT2
  2. ;to patch it to work with FANSI-CONSOLE, or any
  3. ;machine emulating the IBM PC ROM BIOS video calls.
  4. ;Note that this is unnecessary if you use
  5. ;the FANSI-CONSOLE /Y=1 option.
  6. ;(Use DEBUG to display at 100).
  7. ;After the patch is made, DOSEDIT2 will still
  8. ;also work without FANSI-CONSOLE.
  9. ;The commented lines (ones starting with semi-
  10. ;colons) will generate error text but that is OK.
  11. ;----------------------------------------------
  12. ;    debug dosedit2.com <dosedit2.pch
  13. ;----------------------------------------------
  14. ;    MOV    DX,ES:[0050]
  15. A21C
  16. call 7a4
  17. nop
  18. nop
  19.  
  20. ;    MOV    AH,ES:[004A]
  21. A221
  22. call 7ec
  23. nop
  24. nop
  25.  
  26. ;    MOV    BH,00
  27. ;    MOV    AH,02
  28. A235
  29. call 832
  30. nop
  31.  
  32. ;    MOV    DL,ES:[044A]
  33. A246
  34. call 7fc
  35. nop
  36. nop
  37.  
  38. ;    MOV    CX,ES:[0450]
  39. A251
  40. call 7b4
  41. nop
  42. nop
  43.  
  44. ;    CMP    CL,ES:[0450]
  45. A25E
  46. call 7d8
  47. nop
  48. nop
  49.  
  50. ;    MOV    AX,ES:[0450]
  51. A29A
  52. call 7c6
  53. nop
  54.  
  55. ;    MOV    BH,00
  56. ;    MOV    AH,03
  57. A2C7
  58. call 820
  59. nop
  60.  
  61. ;    MOV    DX,ES:[0450]
  62. A398
  63. call 7a4
  64. nop
  65. nop
  66.  
  67. ;    MOV    AX,ES:[0450]
  68. a427
  69. call 7c6
  70. nop
  71.  
  72. ;    CMP    CX,ES:[0450]
  73. a42F
  74. call 80c
  75. nop
  76. nop
  77.  
  78. ;    CMP    CX,ES:[0450]
  79. A51B
  80. call 80c
  81. nop
  82. nop
  83.  
  84. ;    MOV    BH,00
  85. ;    INT    10
  86. A52C
  87. call 83a
  88. nop
  89.  
  90. ;    MOV    AX,ES:[044A]
  91. A578
  92. call 856
  93. nop
  94.  
  95. ;    MOV    BX,0070
  96. a590
  97. call 842
  98.  
  99. ;    MOV    AH,02
  100. ;    INT    10
  101. a604
  102. call 84a
  103. nop
  104.  
  105. ;    MOV    DX,07A4
  106. A79F
  107. mov dx,0880
  108.  
  109. ;    MOV    DX,ES:[0450]
  110. a7a4
  111. push ax
  112. push bx
  113. push cx
  114. cs:mov bh,[AFE]
  115. mov ah,03
  116. int 10
  117. pop cx
  118. pop bx
  119. pop ax
  120. ret
  121.  
  122. ;    MOV    CX,ES:[0450]
  123. a7b4
  124. push ax
  125. push bx
  126. push dx
  127. cs:mov bh,[AFE]
  128. mov ah,03
  129. int 10
  130. mov cx,dx
  131. pop dx
  132. pop bx
  133. pop ax
  134. ret
  135.  
  136. ;    MOV    AX,ES:[0450]
  137. a7c6
  138. push dx
  139. push bx
  140. push cx
  141. cs:mov bh,[AFE]
  142. mov ah,03
  143. int 10
  144. mov ax,dx
  145. pop cx
  146. pop bx
  147. pop dx
  148. ret
  149.  
  150. ;    CMP    CL,ES:[0450]
  151. a7d8
  152. push ax
  153. push bx
  154. push dx
  155. push cx
  156. cs:mov bh,[AFE]
  157. mov ah,03
  158. int 10
  159. pop cx
  160. cmp cl,dl
  161. pop dx
  162. pop bx
  163. pop ax
  164. ret
  165.  
  166. ;    MOV    AH,ES:[044A]
  167. a7ec
  168. push bx
  169. push ax
  170. mov ah,0f
  171. int 10
  172. cs:mov [afe],bh
  173. pop bx
  174. mov al,bl
  175. pop bx
  176. ret
  177.  
  178. ;    MOV    DL,ES:[044A]
  179. a7fc
  180. push bx
  181. push ax
  182. mov ah,0f
  183. int 10
  184. cs:mov [afe],bh
  185. mov dl,ah
  186. pop ax
  187. pop bx
  188. ret
  189.  
  190. ;    CMP    CX,ES:[0450]
  191. a80c
  192. push ax
  193. push bx
  194. push dx
  195. push cx
  196. cs:mov bh,[AFE]
  197. mov ah,03
  198. int 10
  199. pop cx
  200. cmp cx,dx
  201. pop dx
  202. pop bx
  203. pop ax
  204. ret
  205.  
  206. ;    MOV    BH,00
  207. ;    MOV    AH,03
  208. a820
  209. push ax
  210. push bx
  211. mov ah,0f
  212. int 10
  213. cs:mov [AFE],bh
  214. pop ax
  215. mov bl,al
  216. pop ax
  217. mov ah,03
  218. ret
  219.  
  220. ;    MOV    BH,00
  221. ;    MOV    AH,02
  222. a832
  223. cs:mov bh,[AFE]
  224. mov ah,02
  225. ret
  226.  
  227. ;    MOV    BH,00
  228. ;    INT    10
  229. a83a
  230. cs:mov bh,[AFE]
  231. int 10
  232. ret
  233.  
  234. ;    MOV    BX,0070
  235. a842
  236. mov bl,70
  237. cs:mov bh,[afe]
  238. ret
  239.  
  240. ;    MOV    AH,02
  241. ;    INT    10
  242. a84a
  243. cs:mov bh,[afe]
  244. mov ah,02
  245. int 10
  246. ret
  247.  
  248. ;    MOV    AX,ES:[044A]
  249. a856
  250. push bx
  251. mov ah,0f
  252. int 10
  253. cs:mov [afe],bh
  254. xor al,al
  255. xchg al,ah
  256. pop bx
  257. ret
  258.  
  259. rcx
  260. 0780
  261. W
  262. Q
  263.